/*= = = = = = = = = = Compute Active Periods = = = = = = = = = = = */ 

/* = = = = = = = = for an Elementary Video Stream = = = = = = = = = */ 

/* = = = = = = = = = = = . = ... = = = = = = ^ = 



/* Index / denotes the /-th frame, qj denotes the queue size at the instant 
just after the /-th fi^me arrival and index j denotes the 7-th active period. */ 

1 /* Perform initialization */ 
1.1 s{<^\lf,qi<^di\i<r~j<^l, 

2 

2.1 If ( [(^/)/( r)] <€hf) /* no backlog present at the start of next frame */ 

2.1.1 q^^^ir-di+u 

2. 1 .2 (f <- Vf + [{q^)l{ r)]; /* compute end time of current active period */ 

2.1.3 7 

2.1.4 sf <r- [(/+l)/(y)]; /* start time of new active period */ 

2.2 else 

2.2. 1 ^,+1 <r~ qi + dj+i - V;; /* there is backlog carried to current frame */ 

2.3 endif 
3 

3.1 /^i+1; 

3.2 If(/<€AO 
3.2.1 goto Step 2; 

3.3 endif 
4 

4. 1 s{r) <— maxi < ^ <i^qf^] /* compute maximum queue length observed */ 

4.2 tf <r- ^/f + [{qj^)/{ r)]; /* compute end time of last active period */ 

4.3 ria{r)<r- j; /* store the number of active periods */ 

4.4 Define s„a{r)H ^ ; 
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/* = = = = = = = Compute Loss Curve = = = = = = = = = = = = */ 

/* = = = = = = = = for an Elementary Video Stream = = = = = = = = = */ 

/* INIT. B holds the available buffer, Lb holds the sum of the unrestricted queue sizes of 
the busy 

periods with loss at the time instants at which the maximum queue occurs, «/ holds the number 
of busy periods with loss, «^ the number of busy periods, and the number of active periods.*/ 

LI 5<-oo ;i5^0; w/<-0; jl/<-stream_si2e; 

/* Compute busy periods for rate P, and buffer size B. */ 

L2 process_activej)eriods(l, w^, 5); 

/* Insert into the heap the buffer point at which a loss occurs 
for each busy period, compute the buffer size for the first break for 
each busy period and insert it into the heap as well. */ 

L3 For 6 = 1 to «^ /* for each busy period b */ 

L3.1 heap_insert(e/,LOSS,A); 

1.3.2 5'<— compute_next_break(i); 

1.3.3 heap_insert(S', BREAK, 6); 
L4 endfor 

2 /* Extract the maximum buffer from the heap, and process 
the corresponding busy period until the heap becomes empty. */ 

2. 1 (i, B, cause) <- heap_extract_max(); 

/* Let {Sp, tp\ ^p+i), {Sq, tg) be the active periods contained within the busy period b. 
Also, let (sp, ip), {sj, tj) be the active periods contained within the interval ( a^, xj). */ 

2.2 If (cause = LOSS) 

/* update ni and Lg variables */ 

2.2. 1 Lb^Lb + { li = y riii -Si) • P{tj - sp) ); 

2.2.2 rt/^w^l; 

2.3 else /* cause = BREAK */ 
/* update /?/ and Lg variables */ 

2.3.1 LB^LB-{li=jJr{trsd-9{tj-Sp)); 

2.3.2 «/<—«/-!; 

/* Process the break in busy period b: Compute the new busy periods, and update «/ and Lb 
when a busy period already experiences loss. For the remaining new busy periods, insert 
into the heap the buffer points at which the first losses occur. Finally, for all the new 
busy periods, compute the buffer sizes for the first break and insert them into the heap. */ 

2.3.3 process_break(i, 5); 

2.4 endif 

2.5 outputj)oint(5,[(L5-«/B)/(A^)]); 

2.6 If (heap not empty) 
2.6.1 goto Step 2; 

2.7 endif 

/* Output the iast point of the loss curve */ 

2.8 Output (0,[(r-P)/(r)]); 

2.9 STOP; 



FIG. 5 




Transport 
Rate 




time 



FIG. 6 




CO 



CM 



ffl 

o ' — ' 




ooooooooooo 

OOOOt^CDLO'^COCMT- 

(o/o) o!»eu sson 



